home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Grab Bag
/
Shareware Grab Bag.iso
/
007
/
ps68a14.arc
/
MNEMLEV3.ASM
< prev
next >
Wrap
Assembly Source File
|
1987-11-29
|
25KB
|
932 lines
.command +m3
.org 0
adda #h'00
adda #h'ff
adda 100
adda h'00,x
adda h'00,y ;level 3 index y
adda h'ff,x
adda h'ff,y ;level 3 index y
adda 1000
addb #h'00
addb #h'ff
addb 100
addb h'00,x
addb h'00,y ;level 3 index y
addb h'ff,x
addb h'ff,y ;level 3 index y
addb 1000
addd #h'00ff ;level 2 (immediate should be 16 bits)
addd #h'ff00
addd 100
addd h'00,x
addd h'00,y ;level 3 index y
addd h'ff,x
addd h'ff,y ;level 3 index y
addd 1000
adca #h'00
adca #h'ff
adca 100
adca h'00,x
adca h'00,y ;level 3 index y
adca h'ff,x
adca h'ff,y ;level 3 index y
adca 1000
adcb #h'00
adcb #h'ff
adcb 100
adcb h'00,x
adcb h'00,y ;level 3 index y
adcb h'ff,x
adcb h'ff,y ;level 3 index y
adcb 1000
anda #h'00
anda #h'ff
anda 100
anda h'00,x
anda h'00,y ;level 3 index y
anda h'ff,x
anda h'ff,y ;level 3 index y
anda 1000
andb #h'00
andb #h'ff
andb 100
andb h'00,x
andb h'00,y ;level 3 index y
andb h'ff,x
andb h'ff,y ;level 3 index y
andb 1000
bita #h'00
bita #h'ff
bita 100
bita h'00,x
bita h'00,y ;level 3 index y
bita h'ff,x
bita h'ff,y ;level 3 index y
bita 1000
bitb #h'00
bitb #h'ff
bitb 100
bitb h'00,x
bitb h'00,y ;level 3 index y
bitb h'ff,x
bitb h'ff,y ;level 3 index y
bitb 1000
cmpa #h'00
cmpa #h'ff
cmpa 100
cmpa h'00,x
cmpa h'00,y ;level 3 index y
cmpa h'ff,x
cmpa h'ff,y ;level 3 index y
cmpa 1000
cmpb #h'00
cmpb #h'ff
cmpb 100
cmpb h'00,x
cmpb h'00,y ;level 3 index y
cmpb h'ff,x
cmpb h'ff,y ;level 3 index y
cmpb 1000
eora #h'00
eora #h'ff
eora 100
eora h'00,x
eora h'00,y ;level 3 index y
eora h'ff,x
eora h'ff,y ;level 3 index y
eora 1000
eorb #h'00
eorb #h'ff
eorb 100
eorb h'00,x
eorb h'00,y ;level 3 index y
eorb h'ff,x
eorb h'ff,y ;level 3 index y
eorb 1000
ldaa #h'00
ldaa #h'ff
ldaa 100
ldaa h'00,x
ldaa h'00,y ;level 3 index y
ldaa h'ff,x
ldaa h'ff,y ;level 3 index y
ldaa 1000
ldab #h'00
ldab #h'ff
ldab 100
ldab h'00,x
ldab h'00,y ;level 3 index y
ldab h'ff,x
ldab h'ff,y ;level 3 index y
ldab 1000
oraa #h'00
oraa #h'ff
oraa 100
oraa h'00,x
oraa h'00,y ;level 3 index y
oraa h'ff,x
oraa h'ff,y ;level 3 index y
oraa 1000
orab #h'00
orab #h'ff
orab 100
orab h'00,x
orab h'00,y ;level 3 index y
orab h'ff,x
orab h'ff,y ;level 3 index y
orab 1000
staa 100
staa h'00,x
staa h'00,y ;level 3 index y
staa h'ff,x
staa h'ff,y ;level 3 index y
staa 1000
stab 100
stab h'00,x
stab h'00,y ;level 3 index y
stab h'ff,x
stab h'ff,y ;level 3 index y
stab 1000
suba #h'00
suba #h'ff
suba 100
suba h'00,x
suba h'00,y ;level 3 index y
suba h'ff,x
suba h'ff,y ;level 3 index y
suba 1000
subb #h'00
subb #h'ff
subb 100
subb h'00,x
subb h'00,y ;level 3 index y
subb h'ff,x
subb h'ff,y ;level 3 index y
subb 1000
subd #h'00ff ;level 2 (immediate should be 16 bits)
subd #h'ff00
subd 100
subd h'00,x
subd h'00,y ;level 3 index y
subd h'ff,x
subd h'ff,y ;level 3 index y
subd 1000
sbca #h'00
sbca #h'ff
sbca 100
sbca h'00,x
sbca h'00,y ;level 3 index y
sbca h'ff,x
sbca h'ff,y ;level 3 index y
sbca 1000
sbcb #h'00
sbcb #h'ff
sbcb 100
sbcb h'00,x
sbcb h'00,y ;level 3 index y
sbcb h'ff,x
sbcb h'ff,y ;level 3 index y
sbcb 1000
cpx #h'00
cpx #h'ff
cpx 100
cpx h'00,x
cpx h'00,y ;level 3 index y
cpx h'ff,x
cpx h'ff,y ;level 3 index y
cpx 1000
ldx #h'00
ldx #h'ff
ldx 100
ldx h'00,x
ldx h'00,y ;level 3 index y
ldx h'ff,x
ldx h'ff,y ;level 3 index y
ldx 1000
lds #h'00
lds #h'ff
lds 100
lds h'00,x
lds h'00,y ;level 3 index y
lds h'ff,x
lds h'ff,y ;level 3 index y
lds 1000
stx 100
stx h'00,x
stx h'00,y ;level 3 index y
stx h'ff,x
stx h'ff,y ;level 3 index y
stx 1000
sts 100
sts h'00,x
sts h'00,y ;level 3 index y
sts h'ff,x
sts h'ff,y ;level 3 index y
sts 1000
clr 100
clr h'00,x
clr h'00,y ;level 3 index y
clr h'ff,x
clr h'ff,y ;level 3 index y
clr 1000
com 100
com h'00,x
com h'00,y ;level 3 index y
com h'ff,x
com h'ff,y ;level 3 index y
com 1000
neg 100
neg h'00,x
neg h'00,y ;level 3 index y
neg h'ff,x
neg h'ff,y ;level 3 index y
neg 1000
dec 100
dec h'00,x
dec h'00,y ;level 3 index y
dec h'ff,x
dec h'ff,y ;level 3 index y
dec 1000
inc 100
inc h'00,x
inc h'00,y ;level 3 index y
inc h'ff,x
inc h'ff,y ;level 3 index y
inc 1000
rol 100
rol h'00,x
rol h'00,y ;level 3 index y
rol h'ff,x
rol h'ff,y ;level 3 index y
rol 1000
ror 100
ror h'00,x
ror h'00,y ;level 3 index y
ror h'ff,x
ror h'ff,y ;level 3 index y
ror 1000
asl 100
asl h'00,x
asl h'00,y ;level 3 index y
asl h'ff,x
asl h'ff,y ;level 3 index y
asl 1000
lsl 100 ;level 2, should be the same as asl
lsl h'00,x
lsl h'00,y ;level 3 index y
lsl h'ff,x
lsl h'ff,y ;level 3 index y
lsl 1000
asr 100
asr h'00,x
asr h'00,y ;level 3 index y
asr h'ff,x
asr h'ff,y ;level 3 index y
asr 1000
asld ;level 2
lsld ;level 2 same as asld
lsrd ;level2
lsr 100
lsr h'00,x
lsr h'00,y ;level 3 index y
lsr h'ff,x
lsr h'ff,y ;level 3 index y
lsr 1000
tst 100
tst h'00,x
tst h'00,y ;level 3 index y
tst h'ff,x
tst h'ff,y ;level 3 index y
tst 1000
jmp 100
jmp h'00,x
jmp h'00,y ;level 3 index y
jmp h'ff,x
jmp h'ff,y ;level 3 index y
jmp 1000
jsr 100 ;should be direct addressing with level 2
jsr h'00,x
jsr h'00,y ;level 3 index y
jsr h'ff,x
jsr h'ff,y ;level 3 index y
jsr 1000
aba
abx ;level 2
mul ;level 2
pshx ;level 2
pulx ;level 2
clra
clrb
cba
coma
comb
nega
negb
daa
deca
decb
inca
incb
psha
pshb
pula
pulb
rola
rolb
rora
rorb
asla
aslb
asra
asrb
lsra
lsrb
sba
tab
tba
tsta
tstb
dex
dey ;level 3 index y
des
inx
iny ;level 3 index y
ins
txs
tsx
tsy ;level 3 index y
nop
rti
rts
swi
wai
clc
cli
clv
sec
sei
sev
tap
tpa
bra reltst
brn reltst ;level 2, branch never? (skip over offset)
bcc reltst
bhs reltst ;level 2, same as bcc
bcs reltst
blo reltst ;level 2, same as bcs
beq reltst
bge reltst
bgt reltst
reltst: bhi reltst
ble reltst
bls reltst
blt reltst
bmi reltst
bne reltst
bvc reltst
bvs reltst
bpl reltst
bsr reltst
adda # forward1
adda #forward2
adda forward3
adda forward1,x
adda forward1,y ;level 3 index y
adda forward2,x
adda forward2,y ;level 3 index y
adda forward4
addb # forward1
addb #forward2
addb forward3
addb forward1,x
addb forward1,y ;level 3 index y
addb forward2,x
addb forward2,y ;level 3 index y
addb forward4
adca # forward1
adca #forward2
adca forward3
adca forward1,x
adca forward1,y ;level 3 index y
adca forward2,x
adca forward2,y ;level 3 index y
adca forward4
adcb # forward1
adcb #forward2
adcb forward3
adcb forward1,x
adcb forward1,y ;level 3 index y
adcb forward2,x
adcb forward2,y ;level 3 index y
adcb forward4
anda # forward1
anda #forward2
anda forward3
anda forward1,x
anda forward1,y ;level 3 index y
anda forward2,x
anda forward2,y ;level 3 index y
anda forward4
andb # forward1
andb #forward2
andb forward3
andb forward1,x
andb forward1,y ;level 3 index y
andb forward2,x
andb forward2,y ;level 3 index y
andb forward4
bita # forward1
bita #forward2
bita forward3
bita forward1,x
bita forward1,y ;level 3 index y
bita forward2,x
bita forward2,y ;level 3 index y
bita forward4
bitb # forward1
bitb #forward2
bitb forward3
bitb forward1,x
bitb forward1,y ;level 3 index y
bitb forward2,x
bitb forward2,y ;level 3 index y
bitb forward4
cmpa # forward1
cmpa #forward2
cmpa forward3
cmpa forward1,x
cmpa forward1,y ;level 3 index y
cmpa forward2,x
cmpa forward2,y ;level 3 index y
cmpa forward4
cmpb # forward1
cmpb #forward2
cmpb forward3
cmpb forward1,x
cmpb forward1,y ;level 3 index y
cmpb forward2,x
cmpb forward2,y ;level 3 index y
cmpb forward4
eora # forward1
eora #forward2
eora forward3
eora forward1,x
eora forward1,y ;level 3 index y
eora forward2,x
eora forward2,y ;level 3 index y
eora forward4
eorb # forward1
eorb #forward2
eorb forward3
eorb forward1,x
eorb forward1,y ;level 3 index y
eorb forward2,x
eorb forward2,y ;level 3 index y
eorb forward4
ldaa # forward1
ldaa #forward2
ldaa forward3
ldaa forward1,x
ldaa forward1,y ;level 3 index y
ldaa forward2,x
ldaa forward2,y ;level 3 index y
ldaa forward4
ldab # forward1
ldab #forward2
ldab forward3
ldab forward1,x
ldab forward1,y ;level 3 index y
ldab forward2,x
ldab forward2,y ;level 3 index y
ldab forward4
oraa # forward1
oraa #forward2
oraa forward3
oraa forward1,x
oraa forward1,y ;level 3 index y
oraa forward2,x
oraa forward2,y ;level 3 index y
oraa forward4
orab # forward1
orab #forward2
orab forward3
orab forward1,x
orab forward1,y ;level 3 index y
orab forward2,x
orab forward2,y ;level 3 index y
orab forward4
staa forward3
staa forward1,x
staa forward1,y ;level 3 index y
staa forward2,x
staa forward2,y ;level 3 index y
staa forward4
stab forward3
stab forward1,x
stab forward1,y ;level 3 index y
stab forward2,x
stab forward2,y ;level 3 index y
stab forward4
suba # forward1
suba #forward2
suba forward3
suba forward1,x
suba forward1,y ;level 3 index y
suba forward2,x
suba forward2,y ;level 3 index y
suba forward4
subb # forward1
subb #forward2
subb forward3
subb forward1,x
subb forward1,y ;level 3 index y
subb forward2,x
subb forward2,y ;level 3 index y
subb forward4
sbca # forward1
sbca #forward2
sbca forward3
sbca forward1,x
sbca forward1,y ;level 3 index y
sbca forward2,x
sbca forward2,y ;level 3 index y
sbca forward4
sbcb # forward1
sbcb #forward2
sbcb forward3
sbcb forward1,x
sbcb forward1,y ;level 3 index y
sbcb forward2,x
sbcb forward2,y ;level 3 index y
sbcb forward4
cpx # forward1
cpx #forward2
cpx forward3
cpx forward1,x
cpx forward1,y ;level 3 index y
cpx forward2,x
cpx forward2,y ;level 3 index y
cpx forward4
ldx # forward1
ldx #forward2
ldx forward3
ldx forward1,x
ldx forward1,y ;level 3 index y
ldx forward2,x
ldx forward2,y ;level 3 index y
ldx forward4
lds # forward1
lds #forward2
lds forward3
lds forward1,x
lds forward1,y ;level 3 index y
lds forward2,x
lds forward2,y ;level 3 index y
lds forward4
ldd # forward1
ldd #forward2
ldd forward3
ldd forward1,x
ldd forward1,y ;level 3 index y
ldd forward2,x
ldd forward2,y ;level 3 index y
ldd forward4
stx forward3
stx forward1,x
stx forward1,y ;level 3 index y
stx forward2,x
stx forward2,y ;level 3 index y
stx forward4
sts forward3
sts forward1,x
sts forward1,y ;level 3 index y
sts forward2,x
sts forward2,y ;level 3 index y
sts forward4
std forward3
std forward1,x
std forward1,y ;level 3 index y
std forward2,x
std forward2,y ;level 3 index y
std forward4
clr forward3
clr forward1,x
clr forward1,y ;level 3 index y
clr forward2,x
clr forward2,y ;level 3 index y
clr forward4
com forward3
com forward1,x
com forward1,y ;level 3 index y
com forward2,x
com forward2,y ;level 3 index y
com forward4
neg forward3
neg forward1,x
neg forward1,y ;level 3 index y
neg forward2,x
neg forward2,y ;level 3 index y
neg forward4
dec forward3
dec forward1,x
dec forward1,y ;level 3 index y
dec forward2,x
dec forward2,y ;level 3 index y
dec forward4
inc forward3
inc forward1,x
inc forward1,y ;level 3 index y
inc forward2,x
inc forward2,y ;level 3 index y
inc forward4
rol forward3
rol forward1,x
rol forward1,y ;level 3 index y
rol forward2,x
rol forward2,y ;level 3 index y
rol forward4
ror forward3
ror forward1,x
ror forward1,y ;level 3 index y
ror forward2,x
ror forward2,y ;level 3 index y
ror forward4
asl forward3
asl forward1,x
asl forward1,y ;level 3 index y
asl forward2,x
asl forward2,y ;level 3 index y
asl forward4
asr forward3
asr forward1,x
asr forward1,y ;level 3 index y
asr forward2,x
asr forward2,y ;level 3 index y
asr forward4
lsr forward3
lsr forward1,x
lsr forward1,y ;level 3 index y
lsr forward2,x
lsr forward2,y ;level 3 index y
lsr forward4
tst forward3
tst forward1,x
tst forward1,y ;level 3 index y
tst forward2,x
tst forward2,y ;level 3 index y
tst forward4
jmp forward3
jmp forward1,x
jmp forward1,y ;level 3 index y
jmp forward2,x
jmp forward2,y ;level 3 index y
jmp forward4
jsr forward3
jsr forward1,x
jsr forward1,y ;level 3 index y
jsr forward2,x
jsr forward2,y ;level 3 index y
jsr forward4
aba
clra
clrb
cba
coma
comb
nega
negb
daa
deca
decb
inca
incb
psha
pshb
pula
pulb
rola
rolb
rora
rorb
asla
aslb
asra
asrb
lsra
lsrb
sba
tab
tba
tsta
tstb
dex
dey ;level 3 index y
des
inx
iny ;level 3 index y
ins
txs
tsx
tsy ;level 3 index y
nop
rti
rts
swi
wai
clc
cli
clv
sec
sei
sev
tap
tpa
bra reltst2
bcc reltst2
bcs reltst2
beq reltst2
bge reltst2
bgt reltst2
reltst2: bhi reltst2
ble reltst2
bls reltst2
blt reltst2
bmi reltst2
bne reltst2
bvc reltst2
bvs reltst2
bpl reltst2
bsr reltst2
;level 3 instructions-6811
aby
cpd #h'00
cpd #h'ff
cpd 100
cpd h'00,x
cpd h'00,y ;level 3 index y
cpd h'ff,x
cpd h'ff,y ;level 3 index y
cpd 1000
cpd # forward1
cpd #forward2
cpd forward3
cpd forward1,x
cpd forward1,y ;level 3 index y
cpd forward2,x
cpd forward2,y ;level 3 index y
cpd forward4
cpy #h'00
cpy #h'ff
cpy 100
cpy h'00,x
cpy h'00,y ;level 3 index y
cpy h'ff,x
cpy h'ff,y ;level 3 index y
cpy 1000
cpy # forward1
cpy #forward2
cpy forward3
cpy forward1,x
cpy forward1,y ;level 3 index y
cpy forward2,x
cpy forward2,y ;level 3 index y
cpy forward4
ldy #h'00
ldy #h'ff
ldy 100
ldy h'00,x
ldy h'00,y ;level 3 index y
ldy h'ff,x
ldy h'ff,y ;level 3 index y
ldy 1000
ldy # forward1
ldy #forward2
ldy forward3
ldy forward1,x
ldy forward1,y ;level 3 index y
ldy forward2,x
ldy forward2,y ;level 3 index y
ldy forward4
sty 100
sty h'00,x
sty h'00,y ;level 3 index y
sty h'ff,x
sty h'ff,y ;level 3 index y
sty 1000
sty forward3
sty forward1,x
sty forward1,y ;level 3 index y
sty forward2,x
sty forward2,y ;level 3 index y
sty forward4
fdiv
idiv
iny
pshy
puly
stop
tsy
tys
xgdx
xgdy
bclr h'00,h'00
bclr h'00,h'ff
bclr h'ff,h'00
bclr h'ff,h'ff
bclr h'00,x,h'00
bclr h'00,x,h'ff
bclr h'ff,x,h'00
bclr h'ff,x,h'ff
bclr h'00,y,h'00
bclr h'00,y,h'ff
bclr h'ff,y,h'00
bclr h'ff,y,h'ff
bclr forward1,forward1
bclr forward1,h'ff
bclr h'ff,forward1
bclr h'ff,h'ff
bclr forward1,x,forward1
bclr forward1,x,h'ff
bclr h'ff,x,forward1
bclr h'ff,x,h'ff
bclr forward1,y,forward1
bclr forward1,y,h'ff
bclr h'ff,y,forward1
bclr h'ff,y,h'ff
bset h'00,h'00
bset h'00,h'ff
bset h'ff,h'00
bset h'ff,h'ff
bset h'00,x,h'00
bset h'00,x,h'ff
bset h'ff,x,h'00
bset h'ff,x,h'ff
bset h'00,y,h'00
bset h'00,y,h'ff
bset h'ff,y,h'00
bset h'ff,y,h'ff
bset forward1,forward1
bset forward1,h'ff
bset h'ff,forward1
bset h'ff,h'ff
bset forward1,x,forward1
bset forward1,x,h'ff
bset h'ff,x,forward1
bset h'ff,x,h'ff
bset forward1,y,forward1
bset forward1,y,h'ff
bset h'ff,y,forward1
bset h'ff,y,h'ff
brclr h'00,h'00,brbittst
brclr h'00,h'ff,brbittst
brclr h'ff,h'00,brbittst
brclr h'ff,h'ff,brbittst
brclr h'00,x,h'00,brbittst
brclr h'00,x,h'ff,brbittst
brclr h'ff,x,h'00,brbittst
brclr h'ff,x,h'ff,brbittst
brclr h'00,y,h'00,brbittst
brclr h'00,y,h'ff,brbittst
brclr h'ff,y,h'00,brbittst
brclr h'ff,y,h'ff,brbittst
brclr forward1,forward1,brbittst
brclr forward1,h'ff,brbittst
brclr h'ff,forward1,brbittst
brclr h'ff,h'ff,brbittst
brclr forward1,x,forward1,brbittst
brclr forward1,x,h'ff,brbittst
brclr h'ff,x,forward1,brbittst
brclr h'ff,x,h'ff,brbittst
brclr forward1,y,forward1,brbittst
brclr forward1,y,h'ff,brbittst
brclr h'ff,y,forward1,brbittst
brclr h'ff,y,h'ff,brbittst
brset h'00,h'00,brbittst
brset h'00,h'ff,brbittst
brset h'ff,h'00,brbittst
brset h'ff,h'ff,brbittst
brbittst:
brset forward1,forward1,brbittst
brset forward1,h'ff,brbittst
brset h'ff,forward1,brbittst
brset h'ff,h'ff,brbittst
brset forward1,x,forward1,brbittst
brset forward1,x,h'ff,brbittst
brset h'ff,x,forward1,brbittst
brset h'ff,x,h'ff,brbittst
brset forward1,y,forward1,brbittst
brset forward1,y,h'ff,brbittst
brset h'ff,y,forward1,brbittst
brset h'ff,y,h'ff,brbittst
synctst2:
.equ forward1,h'00
.equ forward2,h'ff
.equ forward3,100
.equ forward4,1000